home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d1 / advid105.arc / ROW43.ASM < prev    next >
Assembly Source File  |  1989-08-05  |  1KB  |  56 lines
  1.             PAGE 60,132
  2.  
  3.             TITLE row43.com  version 1.01  1989-04-10
  4.  
  5. ;
  6. ; AnDan Software Row43 Version 1.01
  7. ; Copyright (c) AnDan Software 1989
  8. ;
  9. ; Shareware:
  10. ;
  11. ; This source code may be copied if no fee is charged and
  12. ; if no changes are done.
  13. ;
  14. ;                       AnDan Software
  15. ;
  16. ;
  17. ;
  18.  
  19. com         SEGMENT para
  20.  
  21.             ASSUME cs:com,ds:com,ss:com,es:com
  22.  
  23.             ORG 100H
  24.  
  25. start_main: mov ax,3
  26.             int 10H
  27.             mov ax,1112H
  28.             xor bx,bx
  29.             int 10H
  30.             xor ax,ax
  31.             mov ds,ax
  32.             mov cx,ds:[460H]    ;Cursor type, usually 0607H
  33.             inc ch
  34.             mov dx,3D4H
  35.             mov al,10
  36.             out dx,al
  37.             jmp $+2
  38.             inc dx
  39.             mov al,ch
  40.             out dx,al
  41.             jmp $+2
  42.             dec dx
  43.             mov al,11
  44.             out dx,al
  45.             jmp $+2
  46.             inc dx
  47.             mov al,cl
  48.             out dx,al
  49.             jmp $+2
  50.             mov ax,4C00H
  51.             int 21H
  52.  
  53. com         ENDS
  54.  
  55.             END start_main
  56.